Top 10k strings from Dreadnoughts (1983)(MC Lothlorien).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
4 ;i(pct,i-5 3 ;"(OR '0' TO RETURN) ": 2 vis2=vis^2 2 tbrg=tbrg+180 2 t(pct,q)=t(pct,q)-360 2 t(pct,q)=t(pct,q)+360 2 rng>i(pct,q-5 2 k(pct,i)=1 2 fpwr=fpwr*0.9 2 fpwr=fpwr*0.5 2 DN 2 ;i(pct,q-5 2 ;"USE CURSOR KEYS 2 ;"S"'""'"" 2 ;"PRESS '0' WHEN FINISHED": 2 ;"MAJOR EXPLOSION ": 2 ;"DEFENCE STRENGTHS"; 2 ;" "'" ": 2 )+a(pct,q)<0 1 z(q,tgt)=1 1 z(pct,i)=1 1 y1,x1;d$(x,2 1 y1,x1;d$(x,1 1 y1,x1;d$(i,2 1 y1,x1;d$(i,1 1 y1,x1;c$(x,2 1 y1,x1;c$(x,1 1 y1,x1;c$(i,2 1 y1,x1;c$(i,1 1 y(q,tgt)=1 1 y(q,tgt)=0 1 y(pct,i)=1 1 x(j,l,i)=0 1 vis=basevis+ 1 tgt=i(sb,i,j+2 1 tgt=i(i,j,6 1 tgt=i(i,j,4 1 tbrg>hdg-360 1 tbrg>hdg-180 1 t(pct,q)>f(q,7 1 t(pct,q)>e(q,7 1 t(pct,q)=t(pct,q)-10 1 t(pct,q)=t(pct,q)+10 1 t(pct,q)=f(q,7 1 t(pct,q)=e(q,7 1 t(pct,q)=0 1 t(pct,q)=-f(q,7 1 t(pct,q)=-e(q,7 1 t(pct,q)<-f(q,7 1 t(pct,q)<-e(q,7 1 s(pct,i)=1 1 p$=" PLAYER DECISION PHASE" 1 p$=" GERMAN": 1 p$=" BRITISH": 1 n1=f(tgt,4 1 n1=e(tgt,4 1 i(sb,i,j+2 1 hdg=-(hdg+90 1 fpwr=i(sb,i,1 1 fpwr=h(i,1 1 fpwr=g(i,1 1 fpwr=fpwr*0.75 1 fpwr=(fpwr*(11 1 dbrg=i(sb,i,7 1 dbrg=h(i,6 1 dbrg=g(i,6 1 dbrg=dbrg+360 1 b(pct,i)=1 1 a(pct,q)>f(q,6 1 a(pct,q)>e(q,6 1 a(pct,q)=f(q,6 1 a(pct,q)=f(q,3 1 a(pct,q)=e(q,6 1 a(pct,q)=e(q,3 1 a(pct,q)=a(pct,q)-1 1 a(pct,q)=a(pct,q)+1 1 a(pct,q)=0 1 a(pct,q)=-f(q,6 1 a(pct,q)=-f(q,4 1 a(pct,q)=-e(q,6 1 a(pct,q)=-e(q,4 1 a(pct,q)<-f(q,6 1 a(pct,q)<-e(q,6 1 STUTTGART/STETTIN ELBING/PILLAU 4 'G' CLASS DESTROYERS 4 'S' CLASS DESTROYERS 4 'V' CLASS DESTROYERS VON DER TANN MOLTKE SEYDLITZ DERFFLINGER 1 GUNNERY TARGET ALLOCATION" 1 GERMAN";p$ 1 DREADNOUGHTS - 1 DREADNOUGHTS 1 DN 2 1 DN & 1 BRITISH";p$ 1 ARETHUSA/AURORA CAROLINE/COMUS 4 'M' CLASS DESTROYERS 4 'M' CLASS DESTROYERS 4 'M' CLASS DESTROYERS INVINCIBLE LION PRINCESS ROYAL TIGER 1 ;w(pct,q-2 1 ;w(pct,i-2 1 ;t1+a(pct,i); 1 ;p$;" VICTORY! "; 1 ;n1+t(pct,i): 1 ;"VIEW SITUATION"; 1 ;"UNIT OUT OF BATTLE AREA" 1 ;"UNIT NAMES AND"; 1 ;"UNIT GUNNERY RANGE TGT TGT"; 1 ;"UNIT GUNNERY MAXIMUM TARGET"; 1 ;"UNIT TORPEDOES TARGET"; 1 ;"UNDER FIRE: NO HITS" 1 ;"UNDER FIRE": 1 ;"TORPEDOES/SECONDARY"; 1 ;"TORPEDOES"; 1 ;"TORPEDOED!": 1 ;"TORPEDO RANGE": 1 ;"SUNK ": 1 ;"STRENGTH RANGE UNIT" 1 ;"STRENGTH (P) (S)" 1 ;"SORRY, THAT WON'T DO - YOU'VE"' 1 ;"SIGHT FROM SELECTED UNIT": 1 ;"SETTING UP-"; 1 ;"SELECTED UNIT OUT OF BATTLE AREA"' 1 ;"SECONDARY BATTERIES"; 1 ;"PROPOSED TARGET OUT OF"' 1 ;"PROPOSED TARGET OUT OF RANGE": 1 ;"PROPOSED TARGET NOT IN"' 1 ;"PRESS '0' TO RETURN": 1 ;"PRESS '0' FOR OBSERVED"' 1 ;"PLEASE WAIT": 1 ;"PLEASE TRY AGAIN ": 1 ;"OBSERVED ENEMY ACTIVITY" 1 ;"OBSERVATION" 1 ;"NO SERIOUS DAMAGE": 1 ;"MAGAZINE EXPLOSION!": 1 ;"LIST UNIT NAMES AND"; 1 ;"LEFT? UNIT" 1 ;"INPUT VICTORY"; 1 ;"INPUT UNIT TO BE AMENDED (1-9)"' 1 ;"INPUT TARGET UNIT (1-9)"' 1 ;"INPUT REQUIRED UNIT (3-9)"' 1 ;"INPUT FIRING UNIT (1-9)"' 1 ;"INCREASE/DECREASE HEADING"'' 1 ;"HULL DAMAGED " 1 ;"HULL & ARMAMENT DAMAGED" 1 ;"HIT - NO SERIOUS DAMAGE" 1 ;"HEADING" 1 ;"FRIENDLY UNITS'"; 1 ;"FOLLOWING GERMAN DREADNOUGHT"'"SUNK -"'"" 1 ;"FOLLOWING BRITISH DREADNOUGHT"'"SUNK -"'"" 1 ;"FIRST PLAYER TO DESTROY ";vc;" OF"'" THE ENEMY'S DREADNOUGHTS WINS" 1 ;"FIRING ": 1 ;"FINAL STATES? (Y/N)": 1 ;"ENTER YOUR PLAYER CODE : " 1 ;"ENTER BRITISH PLAYER CODE"' 1 ;"ENEMY ACTIVITY": 1 ;"DO YOU WISH TO REVIEW"' 1 ;"DO YOU WISH TO RECALL? (Y/N)": 1 ;"CURRENT"; 1 ;"CURRENT VISIBILITY = ";vis 1 ;"CONDITION (1-4)": 1 ;"COMBAT REPORTS"; 1 ;"COMBAT REPORTS" 1 ;"CHANGE COURSES/SPEEDS"; 1 ;"CHANGE COURSES/SPEEDS OPTION" 1 ;"BOTH CHOSEN THE SAME CODE!"'' 1 ;"BLOWN UP! ": 1 ;"BATTERIES" 1 ;"ARMAMENT DAMAGED " 1 ;"ANOTHER GAME? (Y/N)": 1 ;"ALLOCATE GUNNERY TARGETS"; 1 ;"ALL ACTIONS COMPLETED"; 1 ;"ACTION"; 1 ;"ACTION EXECUTION PHASE": 1 ;"ACCELERATE/DECELERATE"'' 1 ;":UNDER FIRE": 1 ;"(OR '0' TO CANCEL FIRE)": 1 ;"(3 LETTERS) : " 1 ;" ENTER GERMAN"; 1 ;" DRAWN GAME "; 1 8888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888 1 88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888 1 ,tgt)=x(q,4 1 ,tgt)=x(q,3 1 ,t1,tgt)=x(2 1 ,t1,tgt)=x(1 1 *i(sb,i,j+3 1 *dmpt/(h(tgt,3 1 *dmpt/(g(tgt,3 1 )+a(pct,q)>f(q,3 1 )+a(pct,q)>e(q,3 1 ))/(i(sb,i,3 1 ))/(f(tgt,2 1 ))/(f(g(i,4 1 ))/(e(tgt,2 1 ))/(e(h(i,4 1 (tbrg>hdg+180 1 ''''''''''':